home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 46 / Amiga Format CD46 (1999-10-20)(Future Publishing)(GB)[!][issue 1999-12].iso / -in_the_mag- / reader_requests / scilab / tests / dialogs.tst < prev    next >
Text File  |  1999-09-16  |  6KB  |  136 lines
  1. //This part of the test verify visual aspect of the dialogs window 
  2. // and in particular scroll bars
  3. // It must be checked visually
  4. mode(-1)
  5. //  x_message
  6. //  =========
  7. x_message(['Simple message';'No scroll bar at all']);
  8. x_message(['message with huge vertical part';
  9.           'Only vertical scroll bar'
  10.           string(1:50)']);
  11. x_message(['message with huge horizontal  part';
  12.           'Only horizontal scroll bar'
  13.            strcat(string(1:150),' ')]);
  14. x_message(['huge message';
  15.           'Vertical and horizontal scroll bars'
  16.            strcat(string(1:150),' ');
  17.            string(1:50)']);
  18. //  x_dialog
  19. //  ========
  20. x_dialog(['Simple dialog';'No scroll bar at all'],['0';'1']);
  21. x_dialog(['dialog with huge vertical label part';
  22.           'Only vertical scroll bar'
  23.           'for the Label part';
  24.           string(1:50)'],['0';'1']);
  25. x_dialog(['dialog with huge horizontal label part';
  26.           'Only horizontal scroll bar'
  27.           'for the Label part';
  28.            strcat(string(1:150),' ')],['0';'1']);
  29. x_dialog(['dialog with huge  label part';
  30.           'Vertical and horizontal scroll bars'
  31.           'for the Label part';
  32.            strcat(string(1:150),' ');
  33.            string(1:50)'],['0';'1']);
  34. x_dialog(['dialog with huge vertical dialog part';
  35.           'Only vertical scroll bar'
  36.           'for the Dialog part'],string(1:50)');
  37. x_dialog(['dialog with huge horizontal dialog part';
  38.           'Only horizontal scroll bar'
  39.           'for the Dialog part'],strcat(string(1:150),' '));
  40. x_dialog(['dialog with huge  dialog part';
  41.           'Vertical and horizontal  scroll bars'
  42.           'for the Dialog part'],[strcat(string(1:150),' ');string(1:50)']);
  43. x_dialog(['dialog with huge  label and dialog part';
  44.           'Vertical and horizontal scroll bars'
  45.           'for the Label part';
  46.            strcat(string(1:150),' ');
  47.            string(1:50)'],[strcat(string(1:150),' ');string(1:50)']);
  48. //  x_choose
  49. // =========
  50. x_choose(string(1:10)',['Simple choose';'No scroll bar at all']);
  51. x_choose(string(1:10)',['choose with huge vertical label part';
  52.           'Only vertical scroll bar'
  53.           'for the Label part';
  54.           string(1:50)']);
  55. x_choose(string(1:10)',['choose with huge horizontal label part';
  56.           'Only horizontal scroll bar'
  57.           'for the Label part';
  58.            strcat(string(1:150),' ')]);
  59. x_choose(string(1:10)',['choose with huge  label part';
  60.           'Vertical and horizontal scroll bars'
  61.           'for the Label part';
  62.            strcat(string(1:150),' ');
  63.            string(1:50)']);
  64. x_choose(string(1:50)',['choose with huge vertical choose part';
  65.           'Only vertical scroll bar'
  66.           'for the Choose part']);
  67. x_choose(strcat(string(1:150),' '),['choose with huge horizontal choose part';
  68.           'Only horizontal scroll bar'
  69.           'for the Choose part']);
  70. x_choose([strcat(string(1:150),' ');string(1:50)'],['choose with huge  choose part';
  71.           'Vertical and horizontal  scroll bars'
  72.           'for the Choose part']);
  73. x_choose([strcat(string(1:150),' ');string(1:50)'],['choose with huge  label and choose part';
  74.           'Vertical and horizontal scroll bars'
  75.           'for the Label part';
  76.            strcat(string(1:150),' ');
  77.            string(1:50)']);
  78.  
  79. //  x_mdialog
  80. //  ========
  81. x_mdialog(['Simple multiple dialog';'No scroll bar at all'],..
  82.     ['A','B'],['0';'1']);
  83. x_mdialog(['dialog with huge vertical label part';
  84.           'Only vertical scroll bar'
  85.           'for the Label part';
  86.           string(1:50)'],['A','B'],['0';'1']);
  87. x_mdialog(['multiple dialog with huge horizontal label part';
  88.           'Only horizontal scroll bar'
  89.           'for the Label part';
  90.            strcat(string(1:150),' ')],['A','B'],['0';'1']);
  91. x_mdialog(['multiple dialog with huge  label part';
  92.           'Vertical and horizontal scroll bars'
  93.           'for the Label part';
  94.            strcat(string(1:150),' ');
  95.            string(1:50)'],['A','B'],['0';'1']);
  96. x_mdialog(['multiple dialog with huge vertical dialog part';
  97.           'Only vertical scroll bar'
  98.           'for the Dialog part'],string(1:50)',string(1:50)');
  99. x_mdialog(['multiple dialog with huge horizontal dialog part';
  100.           'Only horizontal scroll bar'
  101.           'for the Dialog part'],'label',strcat(string(1:150),' '));
  102. x_mdialog(['multiple dialog with huge  dialog part';
  103.           'Vertical and horizontal  scroll bars'
  104.           'for the Dialog part'],..
  105.           ['label';string(1:50)'],[strcat(string(1:150),' ');string(1:50)']);
  106. x_mdialog(['multiple dialog with huge  label and dialog part';
  107.           'Vertical and horizontal scroll bars'
  108.           'for the Label part';
  109.            strcat(string(1:150),' ');
  110.            string(1:50)'],..
  111.            ['label';string(1:50)'],..
  112.            [strcat(string(1:150),' ');string(1:50)']);
  113. //  x_mdialog for matrix 
  114. //  =====================
  115.  n=5;m=4;mat=rand(n,m);
  116.  row='row';labelv=row(ones(1,n))+string(1:n)';
  117.  col='col';labelh=col(ones(1,m))+string(1:m)';
  118.  new=evstr(x_mdialog('Small Matrix to edit',labelv,labelh,string(mat)));
  119.  
  120.  n=20;m=20;mat=rand(n,m);
  121.  row='row';labelv=row(ones(1,n))+string(1:n)';
  122.  col='col';labelh=col(ones(1,m))+string(1:m)';
  123.  new=evstr(x_mdialog('Big Matrix to edit',labelv,labelh,string(mat)));
  124. // x_choices 
  125.  
  126. l1=list('choice 1',1,['toggle c1','toggle c2','toggle c3']);
  127. l2=list('choice 2',2,['toggle d1','toggle d2','toggle d3']);
  128. l3=list('choice 3',3,['toggle e1','toggle e2']);
  129. rep=x_choices('Toggle Menu',list(l1,l2,l3));
  130.  
  131. tog='toggle ';tog=tog(ones(1,500))'+string(1:500);
  132. l1=list('choice 1',1,tog);
  133. l2=list('choice 2',2,['toggle d1','toggle d2','toggle d3']);
  134. l3=list('choice 3',3,['toggle e1','toggle e2']);
  135. rep=x_choices('Toggle Menu',list(l1,l2,l3));
  136.